.TITLE	SYSDF
	.IDENT	/10.02/
;
; Copyright (c) 1995-1999 by Mentec, Inc., U.S.A.
; All rights reserved
;
;
; THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED
; OR COPIED ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
;
; D. N. CUTLER 23-AUG-73
;
; PREVIOUSLY MODIFIED FOR RSX-11M-PLUS V2.1 BY:
;
;	D. R. DONCHIN
;	T.    LEKAS
;	T. M. MARTIN
;	B. S. MCCARTHY
;
; MODIFIED FOR RSX-11M-PLUS V2.2 BY:
;
;	H. HUANG	10-MAY-83	10.00
;
;		HH174  -- CLEAN UP ERROR CODES FOR LOGICAL NAME
;			  DIRECTIVES
;
;	J.R. KAUFFMAN	23-FEB-84	10.01
;
;		JRK298 -- CHANGE CONDITIONALS FOR LOGICAL NAME SUPPORT
;
;	J. C. FRANZINI	22-AUG-84	10.02
;
;		JCF173 -- EXPLAIN SYSDEF AND RESOLUTION OF CONDITIONAL OFFSETS
;
; SYSTEM GLOBAL AND CONTROL BLOCK OFFSET DEFINITIONS
;
; GLOBALLY DEFINE THE HIGHEST VECTOR ADDRESS
;

	.GLOBL	R$$MPL,V$$CTR

;
; DEFINE SYSTEM DEPENDENT CONTROL BLOCK OFFSETS AND LENGTHS GLOBALLY
;
;
; The static data structure offsets are defined by invoking the macros without
; the SYSDEF argument.  For example:
;
;	.MCALL	UCBDF$
;	UCBDF$
;
; The static offsets are also defined in EXELIB.
;
; The variable offsets depend on RSXMC conditionals.  They are defined here by
; invoking the macros with the SYSDEF argument, and the definitions end up in
; RSX11M.STB.  References in privileged tasks to the variable offsets are
; resolved when the task is linked to the Exec.
;
; Tasks should never invoke the data structure macros with the SYSDEF argument,
; but rather should let the variable offset definitions be resolved from
; RSX11M.STB.
;

	.MCALL	HWDDF$,PCBDF$,PKTDF$,SCBDF$,TCBDF$
	.MCALL	UCBDF$,F11DF$
	.MCALL	ITBDF$							
	.MCALL	DCBDF$							
	.MCALL	WDBDF$

	.IF DF	L$$GCL

	.MCALL	LNBDF$

	.ENDC	;DF L$$GCL

	HWDDF$	,<=>,SYSDEF	;DEFINE CONDITIONAL MAPPING REGS.
				;AND FEATURE MASK BITS (VMR LOOKS
				;FOR F4.CXD TO DISTINGUISH BL9 AND
				;BEYOND SYSTEMS.)
	PCBDF$	<:>,<=>,SYSDEF		;DEFINE PCB OFFSETS AND LENGTH	
	PKTDF$	,<=>,SYSDEF		;DEFINE I/O PACKET LENGTH	
	ITBDF$	<:>,<=>,SYSDEF		;DEFINE ITB OFFSETS AND LENGTH	
	DCBDF$	,<=>,SYSDEF		;DEFINE DDT OFFSETS		
	SCBDF$	<:>,,SYSDEF		;DEFINE SCB OFFSETS
	TCBDF$	<:>,<=>,SYSDEF		;DEFINE TCB LENGTH		
	UCBDF$	<:>,<=>,,SYSDEF	;DEFINE CONDITIONAL UCB OFFSETS
	F11DF$	<:>,<=>,SYSDEF	;DEFINE FILES-11 BLOCK OFFSETS
	WDBDF$			;DEFINE WDB OFFSETS AND BITS

	.IF DF	L$$GCL

	LNBDF$	<:>,<=>,SYSDEF		;DEFINE LNB OFFSETS AND LENGTHS

	.ENDC	;DF L$$GCL

	WS.UDS==WS.UDS		;MAKE USER D SPACE OFFSET GLOBAL

									
;
; CAUSE OFFSET DEFINITIONS FROM PREFIX FILES TO BE LISTED
;

S$$YDF=0

;
; SYSTEM GLOBAL SYMBOL DEFINITIONS
;
; DIRECTIVE STATUS CODES
;

;
; INSUFFICIENT DYNAMIC CORE AVAILABLE TO SATISFY REQUEST
;

D.RS1==-1.			;

;
; SPECIFIED TASK NOT INSTALLED IN THE SYSTEM
;

D.RS2==-2.			;

;
; UNASSIGNED LUN
;

D.RS5==-5.			;

;
; DRIVER NOT LOADED
;

D.RS6==-6.			;
;
; TASK NOT ACTIVE
;

D.RS7==-7.			;

;
; TASK NOT SUSPENDED/NO DATA QUEUED/TASK CHECKPOINTING ALREADY ENABLED
; OR DISABLED/AST RECOGNITION ALREADY ENABLED OR DISABLED/AST ENTRY ALREADY
; UNSPECIFIED
;

D.RS8==-8.			;

;
; ISSUING TASK NOT CHECKPOINTABLE
;

D.RS10==-10.			;

;
; RECEIVE BUFFER IS TOO SMALL
;
 
D.RS15==-15.
 
;
; PRIVILEGE VIOLATION
;

D.RS16==-16.			;

;									
; VECTOR ALREADY IN USE (CINT$)						
;									
 									
D.RS17==-17.								
 									
;
; NO SWAP SPACE AVAILABLE
;
 
D.RS18==-18.
 
;									
; ILLEGAL VECTOR (CINT$)						
;									
 									
D.RS19==-19.								
 									
;
; ILLEGAL TABLE NUMBER 
;

D.RS20==-20.			;

;
; LOGICAL NAME NOT FOUND
;

D.RS21==-21.			;	

;
; DIRECTIVE ISSUED/NOT ISSUED FROM AST ROUTINE
;

D.RS80==-80.			;

;									
; CANNOT MAP ISR OR DISABLE-INTERRUPT ROUTINE (CINT$)			
;									
 									
D.RS81==-81.								
 									
;
;  WINDOW HAS IO IN PROGRESS
;
 
D.RS83==-83.
 
;
; ALIGNMENT ERROR
;

D.RS84==-84.			;

;
; ADDRESS WINDOW OVERFLOW
;

D.RS85==-85.			;

;
; INVALID REGION ID
;

D.RS86==-86.			;

;
; INVALID WINDOW ID
;

D.RS87==-87.			;

;
; INVALID SEND BUFFER SIZE (GREATER THAN 255.)
;
 
D.RS89==-89.
 
;
; SPECIFIED LUN IS LOCKED IN USE.
;

D.RS90==-90.			;

;
; INVALID UIC
;
 
D.RS91==-91.
 
;
; INVALID DEVICE AND/OR UNIT SPECIFIED.
;

D.RS92==-92.			;

;
; INVALID TIME PARAMETER
;

D.RS93==-93.			;

;
; PARTITION/REGION NOT IN SYSTEM
;

D.RS94==-94.			;

;
; INVALID PRIORITY
;

D.RS95==-95.			;

;
; INVALID LUN
;

D.RS96==-96.			;

;
; INVALID EFN OR REQUIRED EFN NOT SPECIFIED
;

D.RS97==-97.			;

;
; PART OF DPB IS OUTSIDE OF ISSUING TASK'S ADDRESS SPACE
;

D.RS98==-98.			;

;
; INVALID DIC OR DPB SIZE
;

D.RS99==-99.			;

;
; LOGICAL NAME SUPERSEDED
;

D.RSP3==3.			;

;
; EFN WAS SET
;

D.RS22==2.			;

;
; EFN WAS CLEAR
;

D.RS00==0.			;

;
; IF DYNAMIC ALLOCATION IS PRESENT DEFINE D$$YNM GLOBALLY
;

D$$YNM==0			;ALWAYS PRESENT				
									
;
; IF 11/70 EXTENDED MEMORY IS PRESENT DEFINE M$$EXT GLOBALLY
;

	.IIF DF	M$$EXT , M$$EXT==0 ;
 
;
; IF MULTIPROCESSOR SYSTEM DEFINE M$$PRO GLOBALLY
;
 
	.IIF DF	M$$PRO , M$$PRO==M$$PRO

;
; IF MEMORY MANAGEMENT IS PRESENT DEFINE M$$MGE GLOBALLY
;

M$$MGE==0			;ALWAYS PRESENT				
									
;
; IF SEND / RECEIVE BY REFERENCE PRESENT, DEFINE P$$SRF GLOBALLY
;
 
	.IIF DF	P$$SRF , P$$SRF==P$$SRF
 
;
; IF DSPACE PRESENT, DEFINE K$$DAS GLOBALLY
;
 
	.IIF DF K$$DAS , K$$DAS==K$$DAS
 
;
; IF P$$D70 DEFINED, DEFINE IT GLOBALLY
;
 
	.IIF DF	P$$D70 , P$$D70==P$$D70

	.IF DF	B$$LIN

	$BASLN==1		;INDICATE BASELINE SYSTEM

	.IFF	; DF B$$LIN

	$BASLN==0		;INDICATE BASELINE SYSTEM

	.ENDC	; DF B$$LIN

;
; DEFINE MASK OF FEATURES SELECTED AT SYSGEN TIME FOR INCLUSION
; IN RSX11M.STB FILE.
;

	SFMSK=0			;

	.IF DF	S$$EXC

	SFMSK=SFMSK!SF.STD	;STANDARD EXECUTIVE

	.ENDC

	.IF DF	P$$GEN

	SFMSK=SFMSK!SF.PGN	;PREGENERATED SYSTEM (EX. RL02/RC25 KIT)

	.ENDC

; DEFINE GLOBAL SYMBOL

	$SGNMK==SFMSK		;SYSGEN FEATURE MASK
 
	.END